home *** CD-ROM | disk | FTP | other *** search
/ Professional Soft Collection 1.02 / Professional Soft Collection 1.02.iso / winutils / wingauge.zip / INTASM.ASM next >
Assembly Source File  |  1993-01-19  |  217b  |  16 lines
  1.         MODEL    SMALL, PASCAL
  2.  
  3.         CODESEG
  4.  
  5.         PUBLIC    MYMULDIV
  6.  
  7. MYMULDIV    PROC    nNumber:WORD, nNumerat:WORD, nDenominat:WORD
  8.         mov    ax, [nNumber]
  9.         mul    [nNumerat]
  10.         div    [nDenominat]
  11.         ret
  12. MYMULDIV    ENDP
  13.  
  14.         ENDS
  15.  
  16.         END